home *** CD-ROM | disk | FTP | other *** search
/ Acorn User: The RISC OS Graphics CD / Acorn User: The RISC OS Graphics CD.iso / argonet / translator.spk / !Translatr / !Run < prev    next >
Text File  |  1998-10-11  |  2KB  |  57 lines
  1. |>!Run
  2. |
  3. | !Run file for Translator
  4. |
  5.  
  6. Obey <Obey$Dir>.!Boot
  7.  
  8. RMEnsure UtilityModule 3.10 Error I need RISC OS 3.10 or later
  9. RMEnsure UtilityModule 3.70 RMEnsure CallASWI 0.01 RMLoad System:Modules.CallASWI
  10. RMEnsure UtilityModule 3.70 RmEnsure CallASWI 0.01 Error I need CallASWI 0.01 or later
  11.  
  12. If "<Wimp$ScrapDir>" = "" then Error Wimp$ScrapDir not defined
  13.  
  14. Set Translator$ModulesDir <Translator$Dir>.Modules
  15. Set Translator$StoreDir <Wimp$ScrapDir>
  16. Set Translator$ScrapDir <Wimp$ScrapDir>
  17.  
  18. RMEnsure ZeriRegister 0.00 RMLoad <Translator$ModulesDir>.ZRegister
  19. RMEnsure ZeriWimpUtils 1.03 RMLoad <Translator$ModulesDir>.ZWimpUtils
  20. RMEnsure ZeriWimpUtils 1.03 Error I need ZeriWimpUtils 1.03 or later
  21. RMEnsure ZeriLocal 1.01 RMLoad <Translator$ModulesDir>.ZLocal
  22. RMEnsure ZeriLocal 1.01 Error I need ZeriLocal 1.01 or later
  23. RMEnsure ZeriBuffer 1.02 RMLoad <Translator$ModulesDir>.ZBuffer
  24. RMEnsure ZeriBuffer 1.02 Error I need ZeriBuffer 1.02 or later
  25. RMEnsure ZeriArea 1.10 RMLoad <Translator$ModulesDir>.ZArea
  26. RMEnsure ZeriArea 1.10 Error I need ZeriArea 1.10 or later
  27. Set LoadModule No
  28. RMEnsure ZeriImageIO 2.30 Set LoadModule Yes
  29. If "<LoadModule>" = "Yes" then RMLoad <Translator$ModulesDir>.ZImageIO
  30. If "<LoadModule>" = "Yes" then Set ZeriImageIO$BinDir <Translator$Dir>.Bin
  31. If "<LoadModule>" = "Yes" then Set ZeriImageIO$ScrapDir <Wimp$ScrapDir>
  32. Unset LoadModule
  33. RMEnsure ZeriImageIO 2.30 Error I need ZeriImageIO 2.30 or later
  34.  
  35. | If you don't want Translator to use a dynamic area for the heap (as
  36. | available on RISC OS 3.5 and higher) comment out the following line.
  37. Set Translator_Heap 1
  38. RMEnsure UtilityModule 3.50 Unset Translator_Heap
  39.  
  40. | If no dynamic area is being used for the heap, ensure the wimp slot
  41. | is large enough or Translator will crash when running out of memory.
  42. WimpSlot -min 160K -max 160K
  43. If "<Translator_Heap>" = "" then WimpSlot -min 320K -max 320K
  44.  
  45. RegisterModule ZeriWimpUtils
  46. RegisterModule ZeriLocal
  47. RegisterModule ZeriBuffer
  48. RegisterModule ZeriArea
  49. RegisterModule ZeriImageIO
  50.  
  51. Run <Translator$Dir>.Translator %*0
  52.  
  53. UnregisterModule ZeriImageIO
  54. UnregisterModule ZeriArea
  55. UnregisterModule ZeriBuffer
  56. UnregisterModule ZeriLocal
  57. UnregisterModule ZeriWimpUtils